home *** CD-ROM | disk | FTP | other *** search
Modula Definition | 1995-09-28 | 496 b | 24 lines |
- DEFINITION MODULE Logger{"logger.library",40};
-
- FROM ExecD IMPORT Library;
- IMPORT R;
-
- CONST
- loggerName="logger.library";
- version=40; (* Ihre Versionsnummer *)
-
- TYPE
- LoggerBasePtr=POINTER TO LoggerBase;
- LoggerBase=RECORD
- lib: Library;
- END;
-
- PROCEDURE clear; CODE -30;
- PROCEDURE firstPos():LONGCARD; CODE -36;
- PROCEDURE nextPos():LONGCARD; CODE -42;
- PROCEDURE read(pos{R.D2}:LONGCARD):CHAR; CODE -48;
- PROCEDURE write(ch{R.D2}:CHAR); CODE -54;
- PROCEDURE writeStamp; CODE -60;
-
- END Logger.def
-